home *** CD-ROM | disk | FTP | other *** search
/ Internet.Works 41 / Issue 41.iso / pc / PCSoftware / Rational Software Siteload / SiteLoad.exe / data1.cab / Widow / widowport.bat < prev   
Encoding:
DOS Batch File  |  2000-10-23  |  1.2 KB  |  39 lines
  1. @echo off
  2. set tport0=80
  3. set tport1=8080
  4. set tport2=8081
  5. set tport3=8180
  6. set tport4=8181
  7. set tport5=8182
  8. set tport6=0
  9. set tport=%tport0%
  10. set MYTMP=%TMP%
  11. if exist %TMP% goto begin
  12. set MYTMP=%TEMP%
  13. if exist %TEMP% goto begin
  14. set MYTMP=%TMPDIR%
  15. if exist %TMPDIR% goto begin
  16. set MYTMP="C:\"
  17. :begin
  18. rem echo testing %tport% Tempdir=%MYTMP%
  19. %SystemRoot%\system32\netstat -an -p tcp | %SystemRoot%\system32\find "127.0.0.1:%tport%" > NUL:
  20. if not errorlevel 1  goto more
  21. %SystemRoot%\system32\netstat -an -p tcp | %SystemRoot%\system32\find "0.0.0.0:%tport%" > NUL:
  22. if errorlevel 1  goto done
  23. :more
  24. if %tport% == %tport5% set tport=%tport6%
  25. if %tport% == %tport4% set tport=%tport5%
  26. if %tport% == %tport3% set tport=%tport4%
  27. if %tport% == %tport2% set tport=%tport3%
  28. if %tport% == %tport1% set tport=%tport2%
  29. if %tport% == %tport0% set tport=%tport1%
  30. goto :begin
  31. :done
  32. echo REGEDIT4 > %MYTMP%\widow1a.reg
  33. echo. >> %MYTMP%\widow1a.reg
  34. echo [HKEY_LOCAL_MACHINE\Software\Rational Software\SiteLoad] >> %MYTMP%\widow1a.reg
  35. echo "PortNumber"="%tport%" >> %MYTMP%\widow1a.reg
  36. echo. >> %MYTMP%\widow1a.reg
  37. %SystemRoot%\regedit -s %MYTMP%\widow1a.reg
  38. del %MYTMP%\widow1a.reg
  39.